home *** CD-ROM | disk | FTP | other *** search
/ Software of the Month Club 1996 September / Software of the Month Club 1996 September.iso / mac / Software Research Institute-SRI / Business / Alpha ƒ / Tcl / SystemCode / internetConfig.tcl < prev    next >
Encoding:
Text File  |  1995-12-29  |  536 b   |  18 lines  |  [TEXT/ALFA]
  1.  
  2. proc internetProc {menu item} {
  3.     global HOME
  4.     
  5.     switch $item {
  6.         goTo icOpen
  7.         help {edit -r "$HOME:Help:Internet Config"}
  8.         webBrowser {launch -f [icGetPref -t 1 {helperÑhttp}]}
  9.         mailClient {launch -f [icGetPref -t 1 {helperÑmailto}]}
  10.         ftpClient {launch -f [icGetPref -t 1 {helperÑftp}]}
  11.         gopherClient {launch -f [icGetPref -t 1 {helperÑgopher}]}
  12.         telnetClient {launch -f [icGetPref -t 1 {helperÑtelnet}]}
  13.         newsClient {launch -f [icGetPref -t 1 {helperÑnews}]}
  14.         resolveUrl {icURL [getSelect]}
  15.         viewHtmlFile htmlSendWindow
  16.     }
  17. }
  18.